GEZO16
setwd("C:/Users/Law_Adder/Dropbox/Semester III/Thesis/Research Archive/Manuscript/Replication Files/Main Analysis and Plots")
library(tidyverse)
library(caret)
library(sjmisc)
library(jtools)
library(lubridate)
library(glmnet)
library(extrafont)
library(modelr)
loadfonts()#to load latex fonts
setwd("C:/Users/Law_Adder/Dropbox/Semester III/Thesis/Research Archive/Manuscript/Replication Files/Main Analysis and Plots/Data")
#### 1.1 Read and Prepare Data ####
#Note that GEZO is the Dutch abbreviation for the Dutch Health Survey
GEZO16 <- read_rds("GEZO16.rds") #find this object under folder "Data"
GEZO16
